home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Source Code
/
Visual Basic Source Code.iso
/
vbsource
/
wrnsr094
/
header_f.frm
< prev
next >
Wrap
Text File
|
1995-05-08
|
3KB
|
100 lines
VERSION 2.00
Begin Form header_form
BorderStyle = 3 'Fixed Double
Caption = "Edit Header"
ClientHeight = 2220
ClientLeft = 1095
ClientTop = 1485
ClientWidth = 8055
Enabled = 0 'False
Height = 2625
Left = 1035
LinkMode = 1 'Source
LinkTopic = "Form1"
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 2220
ScaleWidth = 8055
Top = 1140
Visible = 0 'False
Width = 8175
Begin TextBox Text3
BorderStyle = 0 'None
Height = 255
Left = 120
TabIndex = 6
Text = "Signature:"
Top = 1560
Width = 975
End
Begin CheckBox sig_check
Height = 495
Left = 1320
TabIndex = 7
Top = 1440
Value = 1 'Checked
Width = 375
End
Begin CommandButton Cancel_button
Caption = "Cancel"
Height = 495
Left = 7080
TabIndex = 5
Top = 960
Width = 855
End
Begin TextBox dest
Height = 375
Left = 1320
TabIndex = 3
Top = 960
Width = 5175
End
Begin TextBox dest_caption
BorderStyle = 0 'None
Enabled = 0 'False
Height = 255
Left = 120
TabIndex = 2
Text = "To:"
Top = 960
Width = 975
End
Begin CommandButton OK_button
Caption = "OK"
Height = 495
Left = 7320
TabIndex = 4
Top = 360
Width = 615
End
Begin TextBox subject
Height = 375
Left = 1320
TabIndex = 0
Top = 360
Width = 5175
End
Begin TextBox Text2
BorderStyle = 0 'None
Enabled = 0 'False
Height = 255
Left = 120
TabIndex = 1
Text = "Subject:"
Top = 360
Width = 855
End
End
Sub Cancel_button_Click ()
header_form.enabled = False
header_form.visible = False
dest.text = ""
End Sub
Sub OK_button_Click ()
header_form.enabled = False
header_form.visible = False
End Sub